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SERTESwIIIT PL/M4-86 V2.0 COMPILATION OF MODULE TS 
OBJECT MODULE PLACED IN :FI:TSTRUC.OBJ 
COMPILER INVOKED BY: PLM86.84 sF1:TSTRUC.PSS OPTIMIZEC3S) XREF SETCF1) DEBUG 


TRUCTURES © 10/26 142557). 


STITLEC“ TCL § 
~" SCOMPACT D&3UG 
kee WARNING 10 IN 1 (CLINE 2) RESPECIFIED PRIMARY CONTROL, IGNORED 
SIP f7 
. SINC LUE CHrrecoyvrtedcs) 
SELSE 


SBINCLUDE C:Flicpyrt.dcep) 


/x Intel Corporation Proprietary Information. 
This listing. is supplied under the terms of a 
license agrement with Intel Corporaton and 

may not be copied nor disclosed except in 
accordance with the terms of that agreement. */ 


PENDIF 
4 ts: O00; 
2 1 DECLARE w WORD, 
“Sie Ae 
BINCLUGE (C:F7:TCLG&L.INC) 
SELSE 
SINCLUDE (€:F1:TCLGBL.INC) 
= [kK RK RK KR OR Rk 
= /x* Global Literals *x*/ 
= [RK IO OK RO OR ok / 
= /* TCL Global Literals . 04/15/82 x/ 
3 1 = DECLARE 
= maxSsend$seg LITERALLY “O7H’, /* max no of back-torback sags that one connection */ 
= /* can send at a time */ 
= tceltheaderSlen LITERALLY 720’, /*x bytes in tcl header x/ 


/* ETHERNET“SPECIFIC VALUES */ 


dllSheaderSlen LITERALLY "14°, /x bytes in dll header *x/ 
minspkti3len LITERALLY “L6", /x minimum total pkt len - bytes */ 


maxSseg$data3len3dlit LITERALLY °1480°%, /x €1480) max now of client bytes in seg x/ 
telSprotocolicede LITERALLY “’S5001H’,/* OLLCONNECT user type field */ 
tcelSprotocoli3codegrev LITERALLY *°0150H’-/* packet header user type field */ 

/x Mise values */ 
tclSmipsport LITERALLY "4", /* mip port for IPSINSM8X x*/ 


fou uw wou u 


= logirbimipsport LITERALLY “5°, /* debugging: mip port for logging */ 

= mipsechosport LITERALLY Pah oe /x mip port of onsbd tcl echo server */ 
= tcl@versionslit LITERALLY "101H’s, /* Version of this TCL for seg header */ 
= definet$S$idslit LITERALLY “1°, /x default Network ID: "this network" */ 


ontbhdstclSecho3port LITERALLY "7? , /* TCL port of onmboard tcl echo server */ 
trues LITERALLY “OFFH’, 


itt 


@ 
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false LITERALLY i? 6 la 
forever LITERALLY “WHILE true’, 


TimeoutSinersase$state LITERALLY °1’%, /* In this state the retransmission timeout 
. is rapidly increased x*/ 
TimeouttsteadySstate LITERALLY °0’°; f/x In this state the timeout is 
slowly decreased. This should not be 
changed, it is the initial state since 
a cdlb is intialised to zero x/ 
SENDIF 


SSUBTITLEC’ TCLCDEB.INC Connection Data Base”) 


ns 


Le | 
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TCLCDS8.=INC Connection Data S8ase 


4 1 DECLARE teledlh BASED w 
ae a ae 
PINCEUDS CHP eteledh. INC) 
SELLS E 
SINCLUDE C:F1stcledb.INnc)d 
= [RK KKKKREKKKK KKK KK KK RK / 
= . /xxk Conn Data Base **x*/ 
= . [KR KRKKKKRKKKR KKK KKK KKK / 
= STRUCTURE ¢€ /* Connection Data Base Template 10/16/81 */ 
= /x Offset */ 
= State BYTE, /x Q uppar bit indicates passive/act open x/ 
= owners3device BYTE-s [x 4 MIP device ID of local client */ 
= ownertprocesstid WORD,/x* 2 ID of local client for failure handler-no relationship to SCL ID’s 
- x«/ 
= loc$cid WORD, [x & x/ 
= /* Following fields (***) are aligned with 
= same fields in RBO~exploited by openrtn */ 
= locSport WORD, [xe § ok x xf . 
= renSnet WORD, {x 8 kk */ 
= remdhost (3) WORD, /x® & = 10t «xx x] 
= remsport WORD, /x* 10 = 16T xxx */ 
= persist WORD, /x 12 = 18t xxx no of times to ignore connect refusal */ 
= abortstoshi WORD, /x* 14 = 20t *xx xf 
= remScid WORD, /* 16 = 227T x/ 
= retranitosdy DWORD, /* 18 = 24T re-transmit timeout. value */ 
= reserved WORD, : J/% 10 = 28T */ 
= timedSseq3no WORD, /* 12 = 30t xmit seq no whose response is being timed x/ 
= segStransStimesdw DwWORD,/* 20 = 32t transmit timestamp for timed segment */ 
= cum$retransdu DWORD, /* 24 = 36t cummulative retran time */ 
= persisticnt WORD, Je 28 = 40% count of number of times my SYN refused */ 
= chtq$ndr POINTER,/* 2A = 42t client buffer transmit queue hdr */ 
= pebadshdr POINTER,/* 2& = 46t posted client buffer queue hdr */ 
= defSstatusi3p POINTER, /* 32 = 50t ptr to deferred status RB, if any */ 
mysackdno WORD, [x 36 54T highest revd seg we can ack x*/ 
seen WORD, /x 38 56T highest seg seq no seen by revr x/ 
my$Scredit BYTE, /*x 3A 58t # pkts we said remote tel can send usx/ 
curblktdindex BYTE+s {/* 33 59¢t blk # of current rev blk x/ 
chdatatindex WORD, /x 3C 60t next avail byte in current rev block */ 


62T # bytes already saved from current numbered rev seg */ 
64t # bytes left in current rev blk */ 


revsbytestconsumed WORDs/* 3E 
curblkslensleftt WORD, [x 40 


hissack$no WORD, {x 42 656t highest xmit seg no acked by remote guy */ 
nextStransmit WORD, /* 44 68t seq no to be sent next Cnot always highest) *«/ 
closedSreason BYTE, /* 46 (Ot Saved rbs.erespo when conn aborted */ 
histeredit BYTE, /* 47 71T & pkts renote tel said we can send x/ 
highest3sent WORD, {x 48 fet err/flow hidden variable for GET x/ 

= chtasbufsent BYTE, /* 44 = 74&t */ 

= pebotbuf scent BYTE, . /* 48 = 75t x*/ 

= pktssrej WORD, /x 40 = 76t #& of revd pkts discarded x*/ 

= oktsSretran WORD, /x* 46 = 78t # of okts renm~transmitted «/ 

= nosconfid WORD, /* 50 = 80t ballpark retry count since last ack*/ 

= lastSnoSconfSid wORD, /x 52 = 82t #8 of retries last time there was a retransmission */ 

= RetransmitSstate byte, /* 54 = 84t State of retransmission algorithm */ 

= sandtlag. BYTE, fx 55 = 85t xf 
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Type byte positioned same as in irb */ 
97t ACB Flag byte Crunnings, expired, clrd) */ 
98t remainder of data ach */ 


dataSach3irbtype SYTE, /* §0 
datasachb3flag BYTE- /x 61 
datasSachSrem(10) BYTE, /* 62 


TCEC93 sINC Connection Data Base 
= pendingSrevSdata WORD, /x 56 = 86t no. of undelivered bytes in last pkt x*/ 
= revsbufSrajsent WORD, /* 58 = &8&t no. of times pkt rejected due to no rev buf */ 
= aytscount WORD, /x 5A = 39O0t now of times ayt pkts weren’t ansawered x/ 
= /* The Alarm control Blocks */ 
= dataSalarm3ch(2) WORD, /x 5C 92t Data Alarm Control Block header */ 


Wow wou 
oO 
On 
c+ 


= etlSalarmSecb (2) WORD, J* 6C =108t Control Alarm Control Block header */ 
= ctlSachSirbtype 3YTE- /x 70 =112t Type byte positioned same as in irh */ 
= ctlSachsflag 3YTE, /* 71 =113t ACB Flag byte Crunning, expired, clrd) */ 
= ctl$achSrem(10) 3YTE) /* 72 =114t rest of ctl ach */ 
= /x 70 =124t Total Length x/ 
DENDIF 
; 


SSUBTITLEC’ TCLSTA.JINC Status Data Block se 
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ToGo baw etle Status Data Block 


QECLARE TCLSTA BASED w 
SIF f7 | 
DINCLUDE (C:F7:tclsta.INC) 
SELSE 

SINCLUDE (C:Fi:tclstaeINC) 


/x Definition of the fields returned in a Status request buffer 


/* fields returned on either type of request */ 
BYTE,s /x state of tel x/ 

defsabort WORD> /* default abort timeout for connections x*/ 
def$retransdu OWORD, J/* default retransmit timeout */ 
defSpersist WORD, /* defualt prsistence value */ 

curSmaxsedbs BYTE, /* max number of cdbs for which there is sp 


STRUCTURE ¢ 
tclSstate 


04/23/82 PAGE 


11/03/81 */ 


ace avail x/ 


> */ 


numedbs SYTE- /* number of connection data bases now allocatedx/ 
locSnet WORD, /x ID of our own network x*/ 

locthost(3) WORD, /x ID of this comm board (the local host ID 
tot3pkts3rej WORD, /* total no. of rev packets rejected by thi 


of times 
there was insufficient 


/x* total number 
/x ttl no times 


totSretranSavents WORD, 
totircvSbuftrej WORD, 


order to 
doing MOVW in statustreq */ 


s TCL x/ 


retran timer expired *x/ 
buf space */ 


agrea */ 


*/ 


rtecScdyw DWORD, /* raalwtimerclock: (Cread-clock units) */ 
/x fields returned only for cid <> Q x/ 

/* NOTE: locport thru remport must be in this 

/x with tcledb.ine declaration - 
loc$yport WORD, /x the local port number of this connection 
remSnet WORD, /* ID of remote network x*/ 
remShost¢€3) WORD, /x 10 of the remote host */ 
remSport WORD, /x* tne remote port number for this connection */ 
loctcid WORD, /x local half of the connection id x/ 
rem$cid WORD, /x remote half of the connection ID x«/ 
connSabort WORD, /x abort timeout value for this connection */ 


connsratranStosSdw OWORD, /x conn retransmit timeout value x«/ 
connspersist WORD, /* persistence value for this connection x«/ 


connstate BYTE, /x state of the connection x/ 
pendingSrcv$data WORD, /* no. of bytes of rev data w/no rev bu 
revbufsrejsent WORD,/* number of times there was insuff rev bu 
chtqSbuftScent BYTE, /* Number of RBs in transnit queue */ 
pebaSbufSent BYTE, /* Number of RBs in Receive buffer queue */ 


locScredit BYTE- /* myScredit: #pokts we said ramotea guy coul 
remScredit 3YTE- /* hisScreditz:#pkts remote guy said we can 


highest3sent WORD, /* highest seg seq number sent (mod 65k) x*/ 


mytack3no WORDs /* highest seg seq number we have acked */ 
nosconfid WORD, /* approximate number of retries since last 


/x was received, 

/* to confidence that remote tel 

/x is still alive and healthy *«/ 
lastSentry BYTE) /x symbolic ret to end of list: 
SENOIF 


/ 


/ 
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f space x/ 
f space */ 


d sand*x/ 
send */ 


ack */ 


value is inversely proportional*/ 
and/or client x*/ 


no info here x/ 
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TCLSEG.INC Segment Header 
6 1 DECLARE TCLSEG SASEO wa 
SbF FT 
SINCLUDE (:F7Fstclseg.INC) 
SELSE 


SINCLUDE CsFI:tcliseg. INC) 

LT RKKKKKKKKKEKKKKKEKEK KEK! 
[xxx Saaqment Format **/ 
| RR RK Ok RK OK ee / 
STRUCTURE (¢ /x 11/15/81 x / 


/x Offset Chex/ dec) «/ 


= kaosSmsg$hdr POINTER, /x Q = OT ptr to link seg buts */ 

= buf len WORD, /x 4 = 4&T =F of bytes Cdest addr thru last data byta) */ 
= /* DATA LINK FIELDS x*/ 

= dlS$dest¢€3) WORD, /x 6 = 6T data link destination */ 

= dlZsource(3) WORD, Je C = 12T data link source x/ 

= dlstype WORD, 4x 12 = 18T~ x/ 

= /x TRANSPORT CONTROL FIELDS x/ 

= telSversion WORD, /* 14 = 20t Version number of sending TCL x*/ 
= dest$port WORD, . /* 16 = 22T */ 

= sourceSport WORD, /x 18 = 24T x/ 

= destScid WORD, /x 1A = 26T */ 

= sourcescid wORD, /x 10 = 28T x/ 

= segsseq$no WORD, /x 1E = 30T */ 

= seaSackSno WORD, /x 20 = 32T */ 

= segSdatasSlen WORD, /x 22 = 34T # segment data bytes:for nad */ 
. ctl WORD, /x 24 = 36T subfields mapped out as: 

= Creserved) bit, 8000H 

= cks bit, 40900H 

= ayt bits 2000H 

= ack bit, 1000H 

= syn bit, O800H 

= fin bit, O400H 

= eon bit, O20CH 

= rst bit, 0100H 

= Creserved) bit, 0040H 

= credit © bits DO3FH xf 

= checksum WORD, /x 26 = 38T x/ 


segScata(1) BYTE) /* 28 = 3AT segment data bytes, length unknown */ 
SENOIF 


r) 
ta 
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DECLARE TCLR3BO BASED 
SIF 7 

SINCLUGE C*#PeStel rho. 
PELSE 

SINCLUDE CFT etel rie. 


STRUCTUREC /k Request Block 


cmxSptr 
mipsbufsbase 
mipslength . 
mipSidsSid 
mipsSouwnerddev 
ownarsprocess 
req 

resp 
rtn3mipiskt 
link 

CID 

locsport 
reminet 
remShost(3) 
remSport 
persist 
abortitimeout 
seq | 


PoUs TIL eG° 


TCLRBO.INC 


Ww 
INC) 
INC) 


POINT=R~, 
POINTER, 
WORD, 
BYTE, 
Sid BYTE, 
Sicl WORD, 
RYTE- 
3YTE, 
WORD-,. 
POINTER, 
WORD, 
WORD, 
WORD, 
WORD, 
WORD, 
WORD, 
WORD, 
WORD) 


19/26 14:55 04/23/82 
Request Slock/Open 
for the TCL Open request 03/31/81 */ 

/x CO = QO for cax/mip to use */ 

/x 4& = O4T : xf 

/x 8 = Q8T : x / 

/e A = 10T : MIP fields: required for */ 

/x 8B = 11T 3: any comm subsystem */ 

/* C = 12T : x / 

/x E— = 14T Code for type of request */ 

/x F = 15T reponse code: ok or error type */ 

/* 10 = 167 return address: kaos mbx or MIP socketx/ 
/x* 12 = 18t to rb tel keeps for abort signaling */ 
/x 16 = 22t returned by open processing */ 

/x 18 = 24t local port for connection */ 

/* 1A = 26t ramote net id : xf 

/x 1C = 28t remote host id : socket */ 

/x 22 = 34t remote port id : x] 

/x 24 = 36t no times to ignore remote connect refusal */ 
/* 26 = 38+ optional abort timeout valus x*/ 

/x 28 = 40t reserved for TCL x«/ 

/x 24 = 42% Total Length */ 


TCLRBS.ZINC 


Request 


Block/Standard’) 


PLYM-S6 COMPILED Te 


DECLARE 
SIF f7 
SINCLUDE 
SELSE 
SINCLUDE 
SER 


10/2 


Request Block/Standard 


LE STRUCTHRES 
TCLRBS.INC 
TCLRBS BSASED w 
C:F7:telrbs.INc) 
CtFietcirbs. INC) 

CTUREC /* Request Block for TCL St 
contents 3YTE, {x G6 
credit BYTE, /*x 1 
last3se WORD, /x 2 

/x above 4 
NipSbufsbase POINTER,/* 4 x/ 
mipSlength WORD, [x 8 x/ 
mipSidsSid RYT=, /x & = 10T 
mipsownert$devsid 3YTE, /* B = 11T 
internaltprocessSid wWORD,/* C.= 12T 
req SYTE, /x E = 14T 
resp 3YTE, /x F = 15T 
rtn3miptskt WORD, /x 10 = 16T 
link POINTER,/* 12 = 18T 
oe | WORD, Je 16 = 22t 
firstised WORD, /x* 18 = 24t 
client3use WORD, /x 1A = 26t 
bufSlen WOR), /* 10 = 28t 
numSbiks BYTE, /x 12 = 30t 
vio BYTE) /x 1F = 31t 

/*x 

/x 20 = 


andard 
flag: 
receive 
seq of 
bytes hold 


x/ 
*/ 


for failure handler, 


requests 
sendable data/signals here */ 
buf credit for this rb */ 

last seg in RB x/ 


6 14:55 


04/23/82 


O5/29/81 x/ 


KAOS ptr when RB on mbx) x*/ 


Code for type of request */ 


reponse 


code: 


ok or erro 


r type *x/ 


not SCL process ID */ 


return address: CMX mbx or MIP sockatx/ 


optional chain to 


returned 
reserved 
Reserved 


another RBx/ 


by open processing */ 


for T 


Sy 


seq of Ist seg in RB 


for client Use (SCL) x/ 


total no of client data 


number o 


start of Variable-length 
used only as symbolic ref for variable ptr ) */ 


f data 


32t Total Length */ 


blocks x/ 


bytes x/ 


3uffer (this 


*/ 


byte */ 
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OOQOH 
QQO0O0H 
QO01H 
O002H 
O004H 
Q006H 
QO008H 
OOOAH 
0010H 
0012H 
0014H 
Q016H 
0018H 


O01CH © 


OO1EH 
0020H 
O0024H 
O028H 
QC2AH 
QOZEH 
0032H 
O036H 
O03 8H 
OQOSAH 
O0038H 
DO3CH 
OO3EH 
0040H 
0042H 
0044H 
OO46H 
O047H 
0048H 
O04AH 
OO48H 
OO04CH 
OO4EH 
O050H 
0052H 
OO54H 


OO554H. 


Q056H 


S222 
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CROSS“REFERENCE LISTING 


NAME, ATTRIBUTES, 


AND REFERENCES 


DPEPNETDOLT Ta < ws -< 
DELLHERDERLEN oo << 
PA See ele ee ce ce 
POR SV ERs) te. ver eae ce ote 
LOGRBMIPPORT . « « 
MAXSEGDATALENLIT . 
MAXSENDSES wg: ee os 
MINPKTLENs « «© © « 
MIPECHOPQRT. »« « 
ONBOTCLECHOPCRT. . 
TELCOS eae a we 
S Paseo 6. at 38 
OWNERDEVICE,. . 
OWNERPROCESS 
LOCC LO a5 a. Gs 
LOCPOR Ie 26. 6s 
REMNEG Twa « 
REMHOS Ts «2-5 
REMPORT. «.« « « 
PERSI S10. « « % 
ASORTTOHI. . s 
REMGLO: ta ce: ay “Ge 
RETRANTOODW . . 
RESERVED «a. ie: 
TIMEDSEQNO . 
SEGTRANSTIMEDW 
CUMRETRANDW,. - 
PERSISTCNT .. 
COPRHD Re an ae os 
PGOOHOR «a 2: 6-2 
DEFSTATUSP . .« 
MYACKNO. « « « 
SEEN Geo air ae ees 
MYCREOLT a: 3 
CURBLKINDEX. . 
CSDATAINDEX «. « 
RCVBYTESCOCNSUM 
CURBLKLENLEFT. 
HISACKNO « «© « 
NEXTTRANSMIT . 
CLOSEOREASON . 
HISCREDIT «. « ~ 
HIGHESTSENT. . 
C&TQBUFCNT . . 
PCBQSUFCNT «» 
PRUSKE0 6° ao &. « 
PXTSRE TRAN «2d 
NOCONFID « « « 
LASTNOCONFID . 


et 
oO 


mi 


RETRANSMITSTATE. 


SENDFLAG « « 
PENDINGRCVODATA 


LITERALLY 
LITERALLY 
LITERALLY 
LITERALLY 
LITERALLY 
LITERALLY 
LITERALLY 
LITERALLY 
LITERALLY 
LITERALLY 
STRUCTURE 
BYTE 
BYTES 
WORD 
WORD 
WORD 
WORD 
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ss Hed 

aa t 

ie 0 el 
"WHILE true’ 
“S’ 
°1480" 
“O7H’ 
“L6° 

iy ad 

sar a 
BASEDCW) 


WORD ARRAY(C3) 


WORD 
WORD 
WORD 
WORD 
DWORD 
WORD 
WORD 
DWORD 
DWORD 
WORD 
POINTER 
POINTER 
POINTER 
wORD 
WORD 
BYTE 
BYTE 
WORD 
WORD 
WORD 
WORD 
WORD 
BYTE 
BYTE 
WORD 
ST e 
BYTE 
WORD 
WORD 
WORD 
WORD 
BYTE 
BYT= 
WORD 
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0O058H 
OO5AH 
OOSCH 
OCé60H 
0061H 
CO62H 
OO6CH 
OO7CH 
OO71H 
O072H 


O000H 
OOOOH 
Q0004H 


Q008H 


QQOQAH 
O008H 
QOO0CH 
QQQEH 
QOQOQFH 
0010H 


O64 2H 


0916H 
0018H 
OO01AdH 


‘001CH 
~0022H 


0024H 
O026H 
O0268H 
QO00H 
GOOO0H 
Q001H 
O002H 
QO04H 
OCO8H 
OOOAH 
0008H 
OOOCH 
QOQQEH 
OOQOQFH 
Q010H 
Q012H 
OC16H 
0018H 
OO1AH 
001CH 
OOTEH 
OO1FH 
OOQOQ0H 
COOOH 
O004H 
OO06H 
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TCL. STRUCTURES 


CROSS"REFERENCE LISTING 


RCVBUFREJCNT . 


AYTCOUNT . 
DATAALARMCB 


DATAACBIRGTYP 


DATAACBFLAG 
DATAAC3REM 
CTLALARMCB 


ils ss 


CTELACSIRGIYPEs 


CTLACSFLAG 
CTLACSREM, 
TCLHEADERLEN . 
TCLMIPPORT 2 .o 
TCLPROTOCOLCODE 
TCLPROTOCOLCODE 
TOLRSO «6 o «ss 
CMXPTR « « 
MIPBUFBASE 
MIPLENGTH. 
MiPEDS LO 


R 


MIPOWNERDEVIO. 
OWNERPROCESSID 


REQ. . a 
RESP 2 
RTNMIPSKT 
WINK ee 
GilOe. 6). -s 
LOCPORT. 
REMNET . 
REMHOST. 
REMPORT. . 
PERSIST. . 
ASORTTIMEOU 
SEQe Se) 
TCURBS:. oe - 5% 
CONTENTS . 
CREDIT. . 
LASTSEQ. . 
MIPBUFBASE 
MIPLENGTH. 
MIPIDSID . 


MIPOWNERDEVIO. 
INTERNALPROCESSID. 


REQs a s s 
RESP oa Je os 
RTNMIPSKT. 
LINK . .e 
CID. « 
FIRSTSEQ 
CLIENTUSE 
BUFLEN . 
NUMBLKS. . 
VB « « «@ 2 
TCLSEG «© «2 «© « 
KAOSMSGHOR 


SUFLEN . 
DLOEST <« 


WORD 

WORD 

WORD ARRAY (2) 
RYTE 

BYTE 

BYTE ARRAY(10) 
WORD ARRAY(2) 
BYTE | 
BYTE 

BYTE ARRAY (C10) 
LITERALLY %20% 
LITERALLY “47% — 
LITERALLY *’5C01H’ 
LITERALLY °0150H’ 
STRUCTURE BASEDCW) 
POINTER 

POINTER 

WORD 

BYTE 

BYTE 

WORD 

BYTE 

BYTE 

WORD 

POINTER 

WORD 

WORD 

WORD 

WORD ARRAY (3) 
WORD 

WORD 

WORD 

WORD 

STRUCTURE BASEDCW) 
BYTE 

BYTE 

WORD 

POINTER 

WORD 

BYTE 

BYTE 

WORD 

BYTE 

BYTE 

WORD 

POINTER 

WORD 

WORD 

WORD 

WORD 

BYTE 

BYTE 

STRUCTURE BASEDCH) 
POINTER 

WORD. 

WORD ARRAY (3) 
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CROSS-REFERENCES 


TCLSTA « 2 


~ 


Ste u 


See Ss 


DLSOURCE . . 
DLTYPE . . 
TCLVERSION . 
DESTPORT .. 
SOURCEPORT 
DESTCID. . 
SOURCECID. 
SEGSEQNO . 
SEGACKNO « 
SEGDATALEN 
Ge. ca a 
CHECKSUM . 
SEGDATA. . 


TCLSTATE 

DEFABORT . 
DEFRETRANDOW., 
DEFPERSIST « 


. CURMAXCDSS . 


NUMCOBS. « « 
LOCNET .. 
LOCHOST. . 
TOTPKTSREJ 
TOTRETRANEV 
TOTRCVBUFRE 
RRCD a. vw. 2 
LOCPORT. . 
REMNET « « 
REMHOST. .« 
REMPORT.s « 
COCCI. 4-2 
REMCID « 
CONNABORT. « 


es @ lms #® 


CONNRETRANTODYW 


CONNPERSIST. 
CONNSTATE. . 


PENDINGRCVDATA 


RCOVBUFREJCNT 
CSTQ3UFCNT . 
PCSQBUFCNT . 
LOCCREDIT. . 
REMCREDLTe « 
HIGHESTSENT. 
MYACKNO. « 
NOCONFID . . 
LASTENTRY. « 


TCLVERSIONLIT. . 


TIMEQUTINCREASESTAT 


N 


—-{ 6 a@ 


TIMEQUTSTEADYSTATE 
ROS 


TS 


We 
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BYTE ARRAY(1) 
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WORD ARRAY C3) 
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WORD ARRAY(3) 
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WORD 
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WORD 
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PL/M~86 COMPILER FOL STRUCTUP ES 10/26 14:55 04/23/82 PAGE 12 
CROSS*REFSRENCe LISTING 


CODE AREA SIZE = 0000n 0D 
CONSTANT AREA SIZE = OOOOH R38) 
VARIABLE AREA SIZE = O002H 20 
MAXIMUM STACK SIZE = OOOOH 09 


299 LINES READ 
1 PROGRAM WARNING 
O PROGRAM ERRORS 


END OF PL/M-86 COMPILATION 


